package com.nowcoder.community.util;

import org.apache.commons.lang3.CharUtils;
import org.apache.commons.lang3.StringUtils;
import org.slf4j.Logger;
import org.slf4j.LoggerFactory;
import org.springframework.stereotype.Component;

import javax.annotation.PostConstruct;
import java.io.BufferedInputStream;
import java.io.BufferedReader;
import java.io.InputStream;
import java.io.InputStreamReader;
import java.util.HashMap;
import java.util.Map;

@Component
public class SensitiveFilter {

    private static final Logger logger = LoggerFactory.getLogger(SensitiveFilter.class);

    private static final String REPLACEMENT = "***";

    // 根节点
    private TrieNode rootNode = new TrieNode();

    // 1.前缀树节点数据结构
    private class TrieNode {
        // 关键词结束标识
        private boolean isKeywordEnd = false;

        // 子节点
        private Map<Character, TrieNode> subNodes = new HashMap<>();

        public boolean isKeywordEnd() {
            return isKeywordEnd;
        }

        public void setKeywordEnd(boolean keywordEnd) {
            isKeywordEnd = keywordEnd;
        }

        // 添加子节点
        public void addSubNode(Character c, TrieNode node) {
            subNodes.put(c, node);
        }

        // 获取子节点
        public TrieNode getSubNode(Character c) {
            return subNodes.get(c);

        }
    }

    // 2.根据敏感词，初始化前缀树上
    @PostConstruct
    private void init() {
        try (
                InputStream is = this.getClass().getClassLoader().getResourceAsStream("sensitive-words.txt");
                BufferedReader reader = new BufferedReader(new InputStreamReader(is));// 先将得到的字节流转换成字符流，再址转换成缓冲流，读取效率高
        ) {
            String keyword;
            while ((keyword = reader.readLine()) != null) {
                // 添加到前缀树
                this.addKeyWordToTire(keyword);
            }
        } catch (Exception e) {
            logger.error("加载敏感词文件失败", e.getMessage());
        }

    }

    /**
     * 将敏感词添加到前缀树中
     * 
     * @param keyword
     */
    private void addKeyWordToTire(String keyword) {
        // 让当前指针指向根节点
        TrieNode tempNode = rootNode;

        for (int i = 0; i < keyword.length(); i++) {
            char c = keyword.charAt(i);
            TrieNode node = tempNode.getSubNode(c);
            // 判断当前字符对应的节点是否被添加到当前节点下
            if (node == null) {// 没有该子节点
                // 初始化子节点
                node = new TrieNode();
                tempNode.addSubNode(c, node);
            }
            // 指向子节点，继续进行遍历
            tempNode = node;

            // 最后一个字符对应的节点要设置结束标记
            if (i == keyword.length() - 1) {
                tempNode.setKeywordEnd(true);
            }
        }
    }

    /**
     * 过滤敏感词
     * 
     * @param text 待过滤的文本
     * @return 过滤后的文本
     */
    // 3.过滤敏感词
    public String filter(String text) {
        if (StringUtils.isBlank(text)) {
            return null;
        }
        // 指针1
        TrieNode tempNode = rootNode;
        // 指针2
        int begin = 0;
        // 指针3
        int position = 0;
        StringBuilder sb = new StringBuilder();
        while (position < text.length()) {
            // 跳过特殊符号
            char c = text.charAt(position);
            if (isSymbol(c)) {
                // 若指针1处于根节点,将此符号计入结果,让指针2向下走一步
                if (tempNode == rootNode) {
                    sb.append(c);
                    begin++;
                }

                // 无论符号在敏感词之前【即指针1处于根节点】或敏感词内部【指针1不处于根节点-begin不能动】
                // 所以无论哪种情况指针3都向下走一步
                position++;
                continue;// 是特殊符号，直接进入下一次循环
            }

            // 检查下级节点
            tempNode = tempNode.getSubNode(c);
            if (tempNode == null) {
                // 以begin开头的字符串不是敏感词
                sb.append(text.charAt(begin));
                // 进入下一个位置
                position = ++begin;
                // 重新指向根节点
                tempNode = rootNode;
            } else if (tempNode.isKeywordEnd()) {
                // 发现敏感词,将begin~position字符串替换掉
                sb.append(REPLACEMENT);
                // 进入下一个位置
                begin = ++position;
                // 重新指向根节点
                tempNode = rootNode;
            } else {
                // 检查下一个字符
                position++;
            }
        }

        // 将最后一批字符计入结果
        sb.append(text.substring(begin));

        return sb.toString();
    }

    /**
     * 判断是否为特殊字符
     * 
     * @return
     */
    private boolean isSymbol(Character c) {
        // isAsciiAlphanumeric判断是否为合法字符[数字或字母] 0x2E80~0x9FFF 是东亚文字范围
        return !CharUtils.isAsciiAlphanumeric(c) && (c < 0x2E80 || c > 0x9FFF);
    }

}
